P2-Q1

Xi Pan

2024-04-08

datatable(birthwt2, options=list(pageLength=15))

datatable(energy, options=list(pageLength=15))

## Warning in instance$preRenderHook(instance): It seems your data is too big for client-side DataTables. You may consider server-side processing:
## https://rstudio.github.io/DT/server.html

xts.energy<-xts(energy$Power_MWH, order.by = energy$realDate)
dygraph(xts.energy, main = "Energy Consumption") %>%
  dyRangeSelector()